﻿Imports System.Windows.Forms

Public Class frmPrincipal
    Private Sub ActualizarInformaciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ActualizarInformaciónToolStripMenuItem.Click
        Dim frm As New frmCargaMasiva
        frm.MdiParent = Me
        frm.flg = "0"
        frm.Show()
    End Sub

    Private Sub IngresarInformaciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IngresarInformaciónToolStripMenuItem.Click
        Dim frm As New frmCargaMasiva
        frm.MdiParent = Me
        frm.flg = "1"
        frm.Show()
    End Sub

    Private Sub RegistrarPedidosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RegistrarPedidosToolStripMenuItem.Click
        Dim formPedido As New frmDocumento
        formPedido.MdiParent = Me
        formPedido.Show()
    End Sub

    Private Sub PrimerConteoToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PrimerConteoToolStripMenuItem1.Click
        Dim frm As New frmINVConteo
        frm.MdiParent = Me
        frm.nroConteo = "1"
        frm.Show()
    End Sub

    Private Sub SegundoConteoToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SegundoConteoToolStripMenuItem1.Click
        Dim frm As New frmINVConteo
        frm.MdiParent = Me
        frm.nroConteo = "2"
        frm.Show()
    End Sub

    Private Sub TercerConteoToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TercerConteoToolStripMenuItem1.Click
        Dim frm As New frmINVConteo
        frm.MdiParent = Me
        frm.nroConteo = "3"
        frm.Show()
    End Sub
End Class
